home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 71.zip / BS1 part 71 / AmosPro2.0_d5.adf / Extensions / |equ.s < prev    next >
Text File  |  1992-09-28  |  35KB  |  1,885 lines

  1.  
  2.  
  3. *
  4. CDebug        set    0
  5. Switcher_Signal    equ    24
  6. *
  7. ***********************************************************
  8. *
  9. *        AMOSPro EQUATES DEFINITION
  10. *
  11. *        By Francois Lionet
  12. *        AMOS (c) 1990-1992 Europress Software Ltd.
  13. *
  14. *        Last change 23/09/1992
  15. *
  16. ***********************************************************
  17. *    This file contains all the equates of the AMOSPro
  18. * programs and extension.
  19. * Be patient, we will soon (I hope) publish informations
  20. * about the functions of the amos.library.
  21. ***********************************************************
  22. *     Only for multi-lingual readers: half english
  23. * half french. That's Europe!
  24. ***********************************************************
  25.  
  26. BFORM_ILBM    equ    %00000001
  27. BFORM_ACBM    equ    %00000010
  28. BFORM_ANIM    equ    %00000100
  29. BCHUNK_BMHD    equ    0
  30. BCHUNK_CAMG    equ    1
  31. BCHUNK_CMAP    equ    2
  32. BCHUNK_CCRT    equ    3
  33. BCHUNK_BODY    equ    4
  34. BCHUNK_AMSC    equ    5
  35. BCHUNK_ABIT    equ    6
  36.  
  37. EntNul:        equ $80000000
  38.  
  39. Circuits:    equ $dff000
  40.  
  41. IntReq:        equ $9c
  42. IntEna:        equ $9a
  43. DmaCon:        equ $96
  44. DmaConR:    equ $02
  45.  
  46. Color00:    equ $180
  47. VhPosR:        equ $6
  48.  
  49. ; Copper
  50. Cop1lc:        equ $80
  51. Cop2lc:        equ $84
  52. CopJmp1:    equ $88
  53. CopJmp2:    equ $8a
  54.  
  55. ; Souris
  56. CiaAprA:    equ $bfe001
  57. Joy0Dat:    equ $a
  58. Joy1Dat:    equ $c
  59. JoyTest:    equ $36
  60. PotGo:        equ $34
  61. PotGoR:        equ $16
  62. Pot0Dat:    equ $12
  63. Pot1Dat:    equ $14
  64.  
  65. ; Bitplanes
  66. BplCon0:    equ $100
  67. BplCon1:    equ $102
  68. BplCon2:    equ $104
  69. Bpl1PtH:    equ $0e0
  70. Bpl1PtL:    equ $0e2
  71. Bpl1Mod:    equ $108
  72. Bpl2Mod:    equ $10a
  73. DiwStrt:    equ $08e
  74. DiwStop:    equ $090
  75. DdfStrt:    equ $092
  76. DdfStop:    equ $094
  77.  
  78. ; Blitter
  79. BltSize:    equ $058
  80. BltAdA:        equ $050
  81. BltAdB:        equ $04c
  82. BltAdC:        equ $048
  83. BltAdD:        equ $054
  84. BltModA:    equ $064
  85. BltModB:    equ $062
  86. BltModC:    equ $060
  87. BltModD:    equ $066
  88. BltCon0:    equ $040
  89. BltCon1:    equ $042
  90. BltDatA:    equ $074
  91. BltDatB:    equ $072
  92. BltDatC:    equ $070
  93. BltDatD:    equ $000
  94. BltMaskG:    equ $044
  95. BltMaskD:    equ $046
  96.  
  97. ;-------------> Systeme
  98.         IFND    ExecBase
  99. ExecBase:    equ 4
  100.         ENDC
  101. StartList:    equ 38
  102. Forbid:        equ -132
  103. Permit:        equ -138
  104. OwnBlitter:    equ -30-426
  105. DisOwnBlitter:    equ -30-432
  106. WaitBlit:    equ -228
  107. OpenLib:    equ -552
  108. CloseLib:    equ -414
  109. AllocMem:    equ -198
  110. AvailMem:    equ -216
  111. FreeMem:    equ -210
  112. Chip:        equ $02
  113. Fast:        equ $04
  114. Clear:        equ $10000
  115. Public:        equ $01
  116. Total        equ $80000
  117. SetFunction:    equ -420
  118. CloseWB:    equ -78
  119. FindTask:    equ -294
  120. AddPort:    equ -354
  121. RemPort:    equ -360
  122. OpenDev:    equ -444
  123. CloseDev:    equ -450
  124. DoIO:        equ -456
  125. SendIO:        equ -462
  126.  
  127. ;-------------> Intuition
  128. OpenScreen:    equ -198
  129. CloseScreen:    equ -66
  130. ScreenToBack:    equ -$F6
  131. OpenWindow:    equ -204
  132. CloseWindow:    equ -72
  133. LoadView:    equ -$DE
  134. CUFLayer:    equ -36
  135. DelLayer:    equ -90
  136.  
  137. ;-------------> Graphic library
  138. InitRastPort:    equ -198
  139. InitTmpRas:    equ -$1d4
  140. TextLength:    equ -54
  141. Text:        equ -60
  142. SetFont:    equ -66
  143. OpenFont:    equ -72
  144. CloseFont:    equ -78
  145. AskSoftStyle:    equ -84
  146. SetSoftStyle:    equ -90
  147. RMove:        equ -240
  148. RDraw:        equ -246
  149. DrawEllipse:    equ -$b4
  150. AreaEllipse:    equ -$ba
  151. AreaMove:    equ -252
  152. AreaDraw:    equ -258
  153. AreaEnd:    equ -264
  154. InitArea:    equ -282
  155. RectFill:    equ -306
  156. ReadPixel:    equ -318
  157. WritePixel:    equ -324
  158. Flood:        equ -330
  159. PolyDraw:    equ -336
  160. ScrollRaster:    equ -396
  161. AskFont:    equ -474
  162. AddFont:    equ -480
  163. RemFont:    equ -486
  164. ClipBlit:    equ -552
  165. BltBitMap:    equ -30
  166. SetAPen:    equ -342
  167. SetBPen:    equ -348
  168. SetDrMd:    equ -354
  169. AvailFonts:    equ -$24
  170. OpenDiskFont    equ -$1e
  171.  
  172. ;-------------> Dos
  173. Input:        equ -54
  174. WaitChar:    equ -204
  175. Read:        equ -42
  176.  
  177. Execall:    MACRO
  178.         move.l    $4.w,a6
  179.         jsr    \1(a6)
  180.         ENDM
  181. GfxCa5        MACRO
  182.         movem.l    d0/d1/a0/a1/a6,-(sp)
  183.         move.l    T_GfxBase(a5),a6
  184.         jsr    \1(a6)
  185.         movem.l    (sp)+,d0/d1/a0/a1/a6
  186.         ENDM
  187.  
  188. *************** DOS
  189. DosCall        MACRO
  190.         move.l    a6,-(sp)
  191.         move.l    DosBase(a5),a6
  192.         jsr    \1(a6)
  193.         move.l    (sp)+,a6
  194.         ENDM
  195. DosOpen:    equ -30
  196. DosClose:    equ -36
  197. DosRead:    equ -42
  198. DosWrite:    equ -48
  199. DosSeek:    equ -66
  200. DosDel:        equ -72
  201. DosRen:        equ -78
  202. DosLock:    equ -84
  203. DosUnLock:    equ -90
  204. DosDupLock:    equ -96
  205. DosExam:    equ -102
  206. DosExNext:    equ -108
  207. Dosinfo:    equ -114
  208. DosMkDir:    equ -120
  209. DosCuDir:    equ -126
  210. DosIOErr:    equ -132
  211. DosDProc:    equ -174
  212. DosParent:    equ -210
  213. DosLoadSeg:    equ -150
  214. DosULoadSeg:    equ -156
  215. DosWChar:    equ -204
  216.  
  217. *************** FLOAT
  218. SPFix:        equ -30
  219. SPFlt:        equ -36
  220. SPCmp:        equ -42
  221. SPTst:        equ -48
  222. SPAbs:        equ -54
  223. SPNeg:        equ -60
  224. SPAdd:        equ -66
  225. SPSub:        equ -72
  226. SPMul:        equ -78
  227. SPDiv:        equ -84
  228. SPFloor:    equ -90
  229. SPCeil:        equ -96
  230.  
  231. SPATan:        equ -30
  232. SPSin:        equ -36
  233. SPCos:        equ -42
  234. SPTan:        equ -48
  235. SPSinCos:    equ -54
  236. SPSinH:        equ -60
  237. SPCosH:        equ -66
  238. SPTanH:        equ -72
  239. SPExp:        equ -78
  240. SPLog:        equ -84
  241. SPPow:        equ -90
  242. SPSqrt:        equ -96
  243. SPTIeee:    equ -102
  244. SPFIeee:    equ -108
  245. SPASin:        equ -114
  246. SPACos:        equ -120
  247. SPLog10:    equ -126
  248.  
  249. *************** AMOS system library
  250. Inkey:        equ 0
  251. ClearKey:    equ 1
  252. Shifts:        equ 2
  253. Instant:    equ 3
  254. KeyMap:        equ 4
  255. Joy:        equ 5
  256. PutKey:        equ 6
  257. Hide:        equ 7
  258. Show:        equ 8
  259. ChangeM:    equ 9
  260. XyMou:        equ 10
  261. XyHard:        equ 11
  262. XyScr:        equ 12
  263. MouseKey:    equ 13
  264. SetM:        equ 14
  265. ScIn:        equ 15
  266. XyWin:        equ 16
  267. LimitM:        equ 17
  268. ZoHd:        equ 18
  269. ResZone:    equ 19
  270. RazZone:    equ 20
  271. SetZone:    equ 21
  272. GetZone:    equ 22
  273. WaitVbl:    equ 23
  274. SetHs:        equ 24
  275. USetHs:        equ 25
  276. SetFunk:    equ 26
  277. GetFunk:    equ 27
  278. AffHs:        equ 28
  279. SetSpBank:    equ 29
  280. NXYAHs:        equ 30
  281. XOffHs:        equ 31
  282. OffHs:        equ 32
  283. ActHs:        equ 33
  284. SBufHs:        equ 34
  285. StActHs:    equ 35
  286. ReActHs:    equ 36
  287. StoreM:        equ 37
  288. RecallM:    equ 38
  289. PriHs:        equ 39
  290. AMALTok:    equ 40
  291. AMALCre:    equ 41
  292. AMALMvO:    equ 42
  293. AMALDAll:    equ 43
  294. AMAL:        equ 44
  295. AMALReg:    equ 45
  296. AMALClr:    equ 46
  297. AMALFrz:    equ 47
  298. AMALUFrz:    equ 48
  299. SetBob:        equ 49
  300. OffBob:        equ 50
  301. OffBobS:    equ 51
  302. ActBob:        equ 52
  303. AffBob:        equ 53
  304. EffBob:        equ 54
  305. SyChip:        equ 55
  306. SyFast:        equ 56
  307. LimBob:        equ 57
  308. ZoGr:        equ 58
  309. SprGet:        equ 59
  310. MaskMk:        equ 60
  311. SpotHot:    equ 61
  312. ColBob:        equ 62
  313. ColGet:        equ 63
  314. ColSpr:        equ 64
  315. SetSync:    equ 65
  316. Synchro:    equ 66
  317. PlaySet:    equ 67
  318. XYBob:        equ 68
  319. XYSp:        equ 69
  320. PutBob:        equ 70
  321. Patch:        equ 71
  322. MouRel:        equ 72
  323. LimitMEc:    equ 73
  324. SyFree:        equ 74
  325. SetHCol:    equ 75
  326. GetHCol:    equ 76
  327. MovOn:        equ 77
  328. KeySpeed:    equ 78
  329. ChanA:        equ 79
  330. ChanM:        equ 80
  331. SPrio:        equ 81
  332. GetDisc:    equ 82
  333. RestartVBL    equ 83
  334. StopVBL        equ 84
  335. KeyWaiting    equ 85        (P) Une touche en attente?
  336. MouScrFront    equ 86        (P) Souris dans ecran de front
  337.  
  338. SyCall:        MACRO
  339.         move.l    T_SyVect(a5),a0
  340.         jsr    \1*4(a0)
  341.         ENDM
  342. SyCalA:        MACRO
  343.         lea    \2,a1
  344.         move.l    T_SyVect(a5),a0
  345.         jsr    \1*4(a0)
  346.         ENDM
  347. SyCalD:        MACRO
  348.         moveq    #\2,d1
  349.         move.l    T_SyVect(a5),a0
  350.         jsr    \1*4(a0)
  351.         ENDM
  352. SyCal2:        MACRO
  353.         moveq    #\2,d1
  354.         move.l    #\3,a1
  355.         move.l    T_SyVect(a5),a0
  356.         jsr    \1*4(a0)
  357.         ENDM
  358.  
  359. ***********************************************************
  360. *        EQUATES BOBS
  361.         RsReset
  362. BbPrev:        rs.l 1
  363. BbNext:        rs.l 1
  364. BbNb:        rs.w 1
  365. BbAct:        rs.w 1
  366. BbX:        rs.w 1
  367. BbY:        rs.w 1
  368. BbI:        rs.w 1
  369. BbEc:        rs.l 1
  370. BbAAEc:        rs.l 1
  371. BbAData:    rs.l 1
  372. BbAMask:    rs.l 1
  373. BbNPlan:    rs.w 1
  374. BbAPlan:    rs.w 1
  375. BbASize:    rs.w 1
  376. BbAMaskG:    rs.w 1
  377. BbAMaskD:    rs.w 1
  378. BbTPlan:    rs.w 1
  379. BbTLigne:    rs.w 1
  380. BbAModO:    rs.w 1
  381. BbAModD:    rs.w 1
  382. BbACon:        rs.w 1
  383. BbACon0:    rs.w 1
  384. BbACon1:    rs.w 1
  385. BbADraw:    rs.l 1
  386. BbLimG:        rs.w 1
  387. BbLimD:        rs.w 1
  388. BbLimH:        rs.w 1
  389. BbLimB:        rs.w 1
  390. * Datas retournement des bobs
  391. BbARetour    rs.l 1
  392. BbRetour    rs.w 1
  393. * Datas decor
  394. BbDecor:    rs.w 1
  395. BbEff:        rs.w 1
  396. BbDCur1:    rs.w 1
  397. BbDCur2:    rs.w 1
  398. BbDCpt:        rs.w 1
  399. BbEMod:        rs.w 1
  400. BbECpt:        rs.w 1
  401. BbEAEc:        rs.w 1
  402. BbESize:    rs.w 1
  403. BbETPlan:    rs.w 1
  404. * Datas pour une sauvegarde de decor
  405. BbDABuf:    rs.l 1        * 0  Adresse buffer
  406. BbDLBuf:    rs.w 1        * 4  Longueur buffer
  407. BbDAEc:        rs.w 1        * 6  Decalage ecran
  408. BbDAPlan:    rs.l 1        * 8  Plans sauves
  409. BbDNPlan:    rs.l 1        * 12 Max plans
  410. BbDMod:        rs.w 1        * 16 Modulo ecran
  411. BbDASize:    rs.w 1        * 18 Taille blitter
  412. Decor:        equ 20        * 20 Taille totale
  413. * Datas pour seconde sauvegarde!
  414.         rs.l Decor
  415. BbLong:        equ __RS
  416.  
  417.  
  418.  
  419. *************** AMOS Screen library
  420.  
  421. BitHide:    equ 7
  422. BitClone:    equ 6
  423. BitDble:    equ 5
  424. EcMaxPlans    equ        6        6 Plans pour le moment!
  425.  
  426.         RsReset
  427. * Bitmap address
  428. EcLogic:    rs.l 6        * 
  429. EcPhysic    rs.l 6        * 
  430. EcCurrent:    rs.l 6        * 
  431.  
  432. * Datas!
  433. EcCon0:        rs.w 1        * 
  434. EcCon2:        rs.w 1        * 
  435. EcTx:        rs.w 1        * 
  436. EcTy:        rs.w 1        * 
  437. EcNPlan:    rs.w 1        * 
  438. EcWX:        rs.w 1        * 
  439. EcWY:        rs.w 1        * 
  440. EcWTx:        rs.w 1        * 
  441. EcWTy:        rs.w 1        * 
  442. EcVX:        rs.w 1        * 
  443. EcVY:        rs.w 1        * 
  444.  
  445. EcDEcran:    rs.l 1        * 
  446. EcColorMap    rs.w 1
  447. EcNbCol        rs.w 1
  448. EcPal        rs.w 32
  449.  
  450. EcTPlan:    rs.l 1        * 
  451. EcWindow:    rs.l 1        * 
  452. EcTxM:        rs.w 1        * 
  453. EcTyM:        rs.w 1        * 
  454. EcTLigne:    rs.w 1        * 
  455. EcFlags:    rs.w 1        * 
  456. EcDual:        rs.w 1        * 
  457. EcWXr:        rs.w 1        * 
  458. EcWTxr:        rs.w 1        * 
  459. EcNumber:    rs.w 1        * 
  460. EcAuto:        rs.w 1        * 
  461.  
  462. * Link with AMAL
  463. EcAW:        rs.w 1
  464. EcAWX:        rs.w 1
  465. EcAWY:        rs.w 1
  466. EcAWT:        rs.w 1
  467. EcAWTX:        rs.w 1
  468. EcAWTY:        rs.w 1
  469. EcAV:        rs.w 1
  470. EcAVX:        rs.w 1
  471. EcAVY:        rs.w 1
  472. * Zone table
  473. EcAZones:    rs.l 1
  474. EcNZones:    rs.w 1
  475. * Save the backgrountd for window
  476. EcWiDec:    rs.w 1
  477. * Graphic functions
  478. EcInkA:        rs.b 1
  479. EcInkB:        rs.b 1
  480. EcMode:        rs.b 1
  481. EcOutL:        rs.b 1
  482. EcLine:        rs.w 1
  483. EcCont:        rs.w 1
  484. EcX:        rs.w 1
  485. EcY:        rs.w 1
  486. EcPat:        rs.l 1
  487. EcPatL:        rs.w 1
  488. EcPatY:        rs.w 1
  489. EcClipX0:    rs.w 1
  490. EcClipY0:    rs.w 1
  491. EcClipX1:    rs.w 1
  492. EcClipY1:    rs.w 1
  493. EcFontFlag:    rs.w 1
  494. EcText:        rs.b 14 
  495. EcFInkA:    rs.b 1
  496. EcFInkB:    rs.b 1
  497. EcFInkC:    rs.b 1
  498. EcIInkA:    rs.b 1
  499. EcIInkB:    rs.b 1
  500. EcIInkC:    rs.b 1
  501. EcFPat:        rs.w 1
  502. EcIPat:        rs.w 1
  503. * Cursor saving
  504. EcCurS:        rs.b 8*6
  505. ; Length of a screen
  506. EcLong:        equ __RS
  507.  
  508. ; Y Screen base
  509. EcYBase:    equ $1000
  510. EcYStrt:    equ EcYBase+26
  511. PalMax:        equ 16
  512.  
  513. ***********************************************************
  514. *        FUNCTIONS
  515. ***********************************************************
  516.  
  517. Raz:        equ 0
  518. CopMake:    equ 1
  519. *        equ 2
  520. Cree:        equ 3
  521. Del:        equ 4
  522. First:        equ 5
  523. Last:        equ 6
  524. Active:        equ 7
  525. CopForce:    equ 8
  526. AView:        equ 9
  527. OffSet:        equ 10
  528. Visible:    equ 11
  529. DelAll:        equ 12
  530. GCol:        equ 13
  531. SCol:        equ 14
  532. SPal:        equ 15
  533. SColB:        equ 16
  534. FlRaz:        equ 17
  535. Flash:        equ 18
  536. ShRaz:        equ 19
  537. Shift:        equ 20
  538. EHide:        equ 21
  539. CBlGet:        equ 22
  540. CBlPut:        equ 23
  541. CBlDel:        equ 24
  542. CBlRaz:        equ 25
  543. Libre:        equ 26
  544. CCloEc:        equ 27
  545. Current:    equ 28
  546. Double:        equ 29
  547. SwapSc:        equ 30
  548. SwapScS:    equ 31
  549. AdrEc:        equ 32
  550. SetDual:    equ 33
  551. PriDual:    equ 34
  552. ClsEc:        equ 35
  553. Pattern:    equ 36
  554. GFonts:        equ 37
  555. FFonts:        equ 38
  556. GFont:        equ 39
  557. SFont:        equ 40
  558. SetClip:    equ 41
  559. BlGet:        equ 42
  560. BlDel:        equ 43
  561. BlRaz:        equ 44
  562. BlPut:        equ 45
  563. VerSli:        equ 46
  564. HorSli:        equ 47
  565. SetSli:        equ 48
  566. MnStart:    equ 49
  567. MnStop:        equ 50
  568. RainDel:    equ 51
  569. RainSet:    equ 52
  570. RainDo:        equ 53
  571. RainHide:    equ 54
  572. RainVar:    equ 55
  573. FadeOn:        equ 56
  574. FadeOf:        equ 57
  575. CopOnOff:    equ 58
  576. CopReset:    equ 59
  577. CopSwap:    equ 60
  578. CopWait:    equ 61
  579. CopMove:    equ 62
  580. CopMoveL:    equ 63
  581. CopBase:    equ 64
  582. AutoBack1:    equ 65
  583. AutoBack2:    equ 66
  584. AutoBack3:    equ 67
  585. AutoBack4:    equ 68
  586. SuPaint:    equ 69
  587. BlRev:        equ 70
  588. DoRev:        equ 71
  589. AMOS_WB        equ 72
  590. ScCpyW        equ 73
  591. MaxRaw        equ 74
  592. NTSC        equ 75
  593.  
  594. EcCall:        MACRO
  595.         move.l    T_EcVect(a5),a0
  596.         jsr    \1*4(a0)
  597.         ENDM
  598. EcCalA:        MACRO
  599.         lea    \2,a1
  600.         move.l    T_EcVect(a5),a0
  601.         jsr    \1*4(a0)
  602.         ENDM
  603. EcCalD:        MACRO
  604.         moveq    #\2,d1
  605.         move.l    T_EcVect(a5),a0
  606.         jsr    \1*4(a0)
  607.         ENDM
  608. EcCal2:        MACRO
  609.         moveq    #\2,d1
  610.         move.l    #\3,a1
  611.         move.l    T_EcVect(a5),a0
  612.         jsr    \1*4(a0)
  613.         ENDM
  614.  
  615. *************** AMOS Window library
  616.  
  617. * Window structure
  618. WiPrev:        equ 0        
  619. WiNext:        equ WiPrev+4    
  620. WiFont:        equ WiNext+4    
  621. WiAdhg:        equ WiFont+4
  622. WiAdhgR:    equ WiAdhg+4
  623. WiAdhgI:    equ WiAdhgR+4
  624. WiAdCur:    equ WiAdhgI+4
  625. WiColor:    equ WiAdCur+4
  626. WiColFl:    equ WiColor+4*6
  627.  
  628. WiX:        equ WiColFl+4*6
  629. WiY:        equ WiX+2
  630. WiTx:        equ WiY+2
  631. WiTy:        equ WiTx+2
  632. WiTyCar:    equ WiTy+2
  633. WiTLigne:    equ WiTyCar+2
  634. WiTxR:        equ WiTLigne+2
  635. WiTyR:        equ WiTxR+2
  636. WiDxI:        equ WiTyR+2
  637. WiDyI:        equ WiDxI+2
  638. WiTxI:        equ WiDyI+2
  639. WiTyI:        equ WiTxI+2
  640. WiDxR:        equ WiTyI+2
  641. WiDyR:        equ WiDxR+2
  642. WiFxR:        equ WiDyR+2
  643. WiFyR:        equ WiFxR+2
  644. WiTyP:        equ WiFyR+2
  645. WiDBuf:        equ WiTyP+2
  646. WiTBuf:        equ WiDBuf+4
  647. WiTxBuf:    equ WiTBuf+4
  648.  
  649. WiPaper:    equ WiTxBuf+2
  650. WiPen:        equ WiPaper+2
  651. WiBorder:    equ WiPen+2
  652. WiFlags:    equ WiBorder+2
  653. WiGraph:    equ WiFlags+2
  654. WiNPlan:    equ WiGraph+2
  655. WiNumber:    equ WiNPlan+2
  656. WiSys:        equ WiNumber+2
  657. WiEsc:        equ WiSys+2
  658. WiEscPar:    equ WiEsc+2
  659. WiTab:        equ WiEscPar+2
  660.  
  661. WiBord:        equ WiTab+2
  662. WiBorPap:    equ WiBord+2
  663. WiBorPen:    equ WiBorPap+2
  664.  
  665. WiMx:        equ WiBorPen+2
  666. WiMy:        equ WiMx+2
  667. WiZoDx:        equ WiMy+2
  668. WiZoDy:        equ WiZoDx+2
  669.  
  670. WiCuDraw:    equ WiZoDy+2
  671. WiCuCol:    equ WiCuDraw+8
  672.  
  673. WiTitH:        equ WiCuCol+2
  674. WiTitB:        equ WiTitH+80
  675. WiLong:        equ WiTitB+80
  676. WiSAuto:    equ WiTitH
  677.  
  678. ***********************************************************
  679. *        WINDOW INSTRUCTIONS 
  680. ***********************************************************
  681. ChrOut:        equ 0
  682. Print:        equ 1
  683. Centre:        equ 2
  684. WindOp:        equ 3
  685. Locate:        equ 4
  686. QWindow:    equ 5
  687. WinDel:        equ 6
  688. SBord:        equ 7
  689. STitle:        equ 8
  690. GAdr:        equ 9
  691. MoveWi:        equ 10
  692. ClsWi:        equ 11
  693. SizeWi:        equ 12
  694. SCurWi:        equ 13
  695. XYCuWi:        equ 14
  696. XGrWi:        equ 15
  697. YGrWi:        equ 16
  698. Print2        equ 17
  699. Print3        equ 18
  700. SXSYCuWi    equ 19
  701.     
  702. WiCall:        MACRO
  703.         move.l    T_WiVect(a5),a0
  704.         jsr    \1*4(a0)
  705.         ENDM
  706. WiCalA:        MACRO
  707.         lea    \2,a1
  708.         move.l    T_WiVect(a5),a0
  709.         jsr    \1*4(a0)
  710.         ENDM
  711. WiCalD:        MACRO
  712.         moveq    #\2,d1
  713.         move.l    T_WiVect(a5),a0
  714.         jsr    \1*4(a0)
  715.         ENDM
  716. WiCal2:        MACRO
  717.         moveq    #\2,d1
  718.         move.l    #\3,a1
  719.         move.l    T_WiVect(a5),a0
  720.         jsr    \1*4(a0)
  721.         ENDM
  722.  
  723. **************    Equates basic
  724. EcFonc:        equ 8
  725. EcEdit:        equ 9
  726. EcFsel:        equ 10
  727. EcReq:        equ 11
  728.  
  729. EdTx:        equ 78
  730.  
  731. EdBTT:        equ 512+256
  732. NbEnd:        equ 10
  733. EcEBase        equ 45
  734. DEBase        equ EcEBase+35-1
  735. SpEBase     equ DEBase+25
  736. FkLong:        equ 26
  737. Shf:        equ %00000011
  738. Ctr:        equ %00001000
  739. Alt:        equ %00110000
  740. Ami:        equ %11000000
  741.  
  742. ***************    Menu definition
  743.         RsReset
  744. MnPrev:        rs.l     1
  745. MnNext:        rs.l     1
  746. MnLat:        rs.l    1
  747. MnNb:        rs.w    1
  748. MnFlag:        rs.w    1
  749. MnX:        rs.w    1
  750. MnY:        rs.w    1
  751. MnTx:        rs.w    1
  752. MnTy:        rs.w    1
  753. MnMX:        rs.w    1
  754. MnMY:        rs.w    1
  755. MnXX:        rs.w    1
  756. MnYY:        rs.w    1
  757. MnZone:        rs.w    1
  758. MnKFlag:    rs.b    1
  759. MnKAsc:        rs.b    1
  760. MnKSc:        rs.b     1
  761. MnKSh:        rs.b    1
  762. * Menu objects
  763. MnObF:        rs.l    1
  764. MnOb1:        rs.l    1
  765. MnOb2:        rs.l    1
  766. MnOb3:        rs.l    1
  767. MnAdSave:    rs.l    1
  768. MnDatas:    rs.l    1
  769. MnLData:    rs.w     1
  770. MnInkA1:    rs.b    1
  771. MnInkB1:    rs.b    1
  772. MnInkC1:    rs.b    1
  773. MnInkA2:    rs.b    1
  774. MnInkB2:    rs.b    1
  775. MnInkC2:    rs.b    1
  776. MnLong:        equ __RS
  777.  
  778. * Flags
  779. MnFlat:        equ     0
  780. MnFixed:    equ     1
  781. MnSep:        equ     2
  782. MnBar:        equ     3
  783. MnOff:        equ     4
  784. MnTotal:    equ     5
  785. MnTBouge:    equ     6
  786. MnBouge:    equ     7
  787.  
  788. *************** Test control bits 
  789. BitControl:    equ     8
  790. BitMenu:    equ     9
  791. BitJump:    equ     10
  792. BitEvery:    equ     11
  793. BitEcrans:    equ     12
  794. BitBobs:    equ     13
  795. BitSprites:    equ     14
  796. BitVBL:        equ     15
  797.  
  798. ; __________________________________
  799. ;
  800. ;     Definition d'un slider
  801. ; __________________________________
  802. ;
  803. Sl_FlagVertical    equ     0
  804.         RsReset
  805. ; Variables positionnement
  806. Sl_Sx        rs.w    1
  807. Sl_Sy        rs.w    1
  808. Sl_Global    rs.w    1
  809. Sl_Position    rs.w    1
  810. Sl_Window    rs.w    1
  811. Sl_X        rs.w    1
  812. Sl_Y        rs.w    1
  813. Sl_ZDx        rs.w    1
  814. Sl_ZDy        rs.w    1
  815. ; Variables fonctionnement
  816. Sl_Flags    rs.w    1
  817. Sl_Start    rs.w    1
  818. Sl_Size        rs.w    1
  819. Sl_Scroll    rs.w    1
  820. Sl_Mouse1    rs.w    1
  821. Sl_Mouse2    rs.w    1
  822. Sl_Zone        rs.w    1
  823. Sl_Routines    rs.l    1
  824. ; Encres
  825. Sl_Inactive    rs.w    3+3+2
  826. Sl_Active    rs.w    3+3+2
  827. Sl_Long        equ    __RS
  828. ; __________________________________
  829. ;
  830. ;     Definition d'un bouton
  831. ; __________________________________
  832. ;
  833. Bt_FlagNew    equ    0
  834. Bt_FlagNoWait    equ    1
  835. Bt_FlagOnOf    equ    2
  836.         RsReset
  837. Bt_Number    rs.w    1
  838. Bt_X        rs.w    1
  839. Bt_Y        rs.w    1
  840. Bt_Image    rs.w    1
  841. Bt_Zone        rs.w    1
  842. Bt_Pos        rs.w    1
  843. Bt_Routines    rs.l    1
  844. Bt_Dx        rs.b    1
  845. Bt_Dy        rs.b    1
  846. Bt_Sx        rs.b    1
  847. Bt_Sy        rs.b    1
  848. Bt_RDraw    rs.b    1
  849. Bt_RChange    rs.b    1
  850. Bt_RPos        rs.b    1
  851. Bt_Flags    rs.b    1
  852. Bt_Long        equ    __RS
  853.  
  854. ; ___________________________________
  855. ;
  856. ;     BITMAP PACKER/UNPACKER
  857. ; ___________________________________
  858.  
  859. ; Packed screen header
  860.         RsReset
  861. PsCode        rs.l 1
  862. PsTx        rs.w 1
  863. PsTy        rs.w 1
  864. PsAWx        rs.w 1
  865. PsAWy        rs.w 1
  866. PsAWTx        rs.w 1
  867. PsAWTy        rs.w 1
  868. PsAVx        rs.w 1
  869. PsAVy        rs.w 1
  870. PsCon0        rs.w 1
  871. PsNbCol        rs.w 1
  872. PsNPlan        rs.w 1
  873. PsPal        rs.w 32
  874. PsLong        equ __RS
  875. SCCode        equ $12031990
  876. ; Packed bitmap header
  877. ; ~~~~~~~~~~~~~~~~~~~~
  878.         RsReset
  879. Pkcode       rs.l 1
  880. Pkdx         rs.w 1
  881. Pkdy         rs.w 1
  882. Pktx         rs.w 1
  883. Pkty         rs.w 1
  884. Pktcar       rs.w 1
  885. Pknplan        rs.w 1
  886. PkDatas2     rs.l 1
  887. PkPoint2     rs.l 1
  888. PkLong      equ __RS
  889. PkDatas1    equ __RS
  890. BMCode        equ $06071963
  891.  
  892. ; ______________________________________________________________________________
  893. ;
  894. ;        EDITEUR LIGNE
  895. ;
  896.         RsReset
  897. LEd_Buffer    rs.l    1
  898. LEd_Start    rs.w    1
  899. LEd_Large    rs.w    1
  900. LEd_Max        rs.w    1
  901. LEd_Long    rs.w    1
  902. LEd_Cur        rs.w    1
  903. LEd_X        rs.w    1
  904. LEd_Y        rs.w    1
  905. LEd_Screen    rs.w    1
  906. LEd_Flags    rs.w    1
  907. LEd_Mask    rs.l    3
  908. LEd_Size    equ    __RS
  909. LEd_FKeys    equ    0
  910. LEd_FOnce    equ    1
  911. LEd_FCursor    equ    2
  912. LEd_FFilter    equ    3
  913. LEd_FMouse    equ    4
  914. LEd_FTests    equ    5
  915. LEd_FMulti    equ    6
  916. LEd_FMouCur    equ    7
  917.  
  918. ; _____________________________________________________________________________
  919. ;     GESTION DES DIALOGUES
  920.  
  921. ; __________________________________________
  922. ;
  923. ;    Base de la zone de dialogue
  924. ;
  925.         RsReset
  926. Dia_Channel    rs.l    1
  927. Dia_NVar    rs.l    1
  928. Dia_Sp        rs.l    1
  929. Dia_Screen    rs.l    1
  930. Dia_ScreenNb    rs.w    1
  931. Dia_ScreenOld    rs.w    1
  932. Dia_WindOld    rs.w    1
  933. Dia_WindOn    rs.w    1
  934. Dia_Programs    rs.l    1
  935. Dia_ProgLong    rs.l    1
  936. Dia_Labels    rs.l    1
  937. Dia_Messages    rs.l    1
  938. Dia_ABuffer    rs.l    1
  939. Dia_PBuffer    rs.l    1
  940. Dia_Buffer    rs.l    1
  941. Dia_Pile    rs.l    1
  942. Dia_PUsers    rs.l    1
  943. Dia_NPUsers    rs.w    1
  944. Dia_Users    rs.w    1
  945. Dia_Edited    rs.l    1
  946. Dia_Timer    rs.l    1
  947. Dia_TimerPos    rs.l    1
  948. Dia_LastZone    rs.l    1
  949. Dia_NextZone    rs.l    1
  950. Dia_Release    rs.l    1
  951. Dia_BaseX    rs.l    1
  952. Dia_BaseY    rs.l    1
  953. Dia_Sx        rs.l    1
  954. Dia_Sy        rs.l    1
  955. Dia_XA        rs.w    1
  956. Dia_YA        rs.w    1
  957. Dia_XB        rs.w    1
  958. Dia_YB        rs.w    1
  959. Dia_Puzzle    rs.l    1
  960. Dia_PuzzleSx    rs.l    1
  961. Dia_PuzzleSy    rs.l    1
  962. Dia_PuzzleI    rs.l    1
  963. Dia_LastKey    rs.l    1
  964. Dia_Error    rs.w    1
  965. Dia_ErrorPos    rs.w    1
  966. Dia_Return    rs.w    1
  967. Dia_Exit    rs.w    1
  968. Dia_Writing    rs.w    1
  969. Dia_RFlags    rs.b    1
  970. Dia_Flags    rs.b    1
  971. Dia_SlDefault    rs.b    16
  972.         rs.l    4
  973. Dia_Vars    equ    __RS
  974. Dia_Source    equ    Dia_LastKey
  975. Dia_FSource    equ    Dia_Edited
  976.  
  977. ; Entete d'une zone active
  978. ; ~~~~~~~~~~~~~~~~~~~~~~~~
  979.         RsReset
  980. Dia_Ln        rs.w    1        0 Long
  981. Dia_Id        rs.w    1        2 Id
  982. Dia_ZoId    rs.w    1        4 ZoId
  983. Dia_ZoX        rs.w    1        6 ZoX
  984. Dia_ZoY        rs.w    1        8 ZoY
  985. Dia_ZoSx    rs.w    1        10 ZoSx
  986. Dia_ZoSy    rs.w    1        12 ZoSy
  987. Dia_ZoNumber    rs.w    1        14 ZoNumber
  988. Dia_ZoRChange    rs.w    1        16 Routine change
  989. Dia_ZoPos    rs.l    1        18 Position
  990. Dia_ZoVar    rs.l    1        22 Variable interne
  991. Dia_ZoFlags    rs.b    1        26
  992.         rs.b    1
  993. Dia_ZoLong    equ    __RS
  994. ; Entete d'un bouton dialogue
  995. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~
  996.         RsReset
  997.         rs.b    Dia_ZoLong    Entete zone active
  998. Dia_BtRDraw    rs.w    1
  999. Dia_BtRChange    rs.w    1
  1000. Dia_BtMin    rs.w    1
  1001. Dia_BtMax    rs.w    1
  1002. Dia_BtLong    equ    __RS
  1003. ; Entete d'une ligne d'edition
  1004. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1005.         RsReset
  1006.         rs.b    Dia_ZoLong    Entete zone active
  1007. Dia_LEd        rs.b    LEd_Size
  1008. Dia_EdLong    equ    __RS
  1009. Dia_DiValue    rs.l    1
  1010. Dia_DiBuffer    rs.b    16
  1011. Dia_DiLong    equ    __RS
  1012. ; Entete d'une liste active
  1013. ; ~~~~~~~~~~~~~~~~~~~~~~~~~
  1014.         RsReset
  1015.         rs.b    Dia_ZoLong    Entete zone active
  1016. Dia_LiTx    rs.w    1
  1017. Dia_LiTy    rs.w    1
  1018. Dia_LiPos    rs.w    1
  1019. Dia_LiMaxAct    rs.w    1
  1020. Dia_LiArray    rs.l    1
  1021. Dia_LiLArray    rs.w    1
  1022. Dia_LiActNumber    rs.w    1
  1023. Dia_LiLong    equ    __RS
  1024. ; Entete d'un texte actif
  1025. ; ~~~~~~~~~~~~~~~~~~~~~~~
  1026.         RsReset
  1027.         rs.b    Dia_ZoLong    Entete zone active
  1028. Dia_TxTx    rs.w    1
  1029. Dia_TxTy    rs.w    1
  1030. Dia_TxPos    rs.w    1
  1031. Dia_TxNLine    rs.w    1
  1032. Dia_TxText    rs.l    1
  1033. Dia_TxDisplay    rs.l    1
  1034. Dia_TxDispSize    rs.w    1
  1035. Dia_TxDispMax    rs.w    1
  1036. Dia_TxAdress    rs.l    1
  1037. Dia_TxAct    rs.l    1
  1038. Dia_TxYAct    rs.w    1
  1039. Dia_TxPen    rs.b    1
  1040. Dia_TxPaper    rs.b    1
  1041. Dia_TxPp    rs.b    8
  1042. Dia_TxBuffer    rs.b    64
  1043. Dia_TxBufferEnd    equ    __RS
  1044. Dia_TxLong    equ    __RS
  1045. ; Definition des zones actives
  1046. Dia_TxDispZone    equ    8
  1047.  
  1048. ; Entete d'un slider
  1049. ; ~~~~~~~~~~~~~~~~~~
  1050.         RsReset
  1051.         rs.b    Dia_ZoLong    Entete zone active
  1052. Dia_Sl        rs.b    Sl_Long        Données gestion slider
  1053. Dia_SlLong    equ    __RS
  1054. ; Entete d'une definition de touche
  1055. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1056.         RsReset
  1057.         rs.w    2
  1058. Dia_KyCode    rs.b    1
  1059. Dia_KyShift    rs.b    1
  1060. Dia_KyZone    rs.l    1
  1061. Dia_KyLong    equ    __RS
  1062. ; Entete d'une sauvegarde de block
  1063. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1064.         RsReset
  1065.         rs.w    2
  1066. Dia_BlNumber    rs.w    1
  1067. Dia_BlLong    equ    __RS
  1068. ; Marques de reconnaissance
  1069. ; ~~~~~~~~~~~~~~~~~~~~~~~~~
  1070. Dia_BtMark    equ    "Bt"
  1071. Dia_StMark    equ    "St"
  1072. Dia_EdMark    equ    "Ed"
  1073. Dia_KyMark    equ    "Ky"
  1074. Dia_BlMark    equ    "Bl"
  1075. Dia_ZoMark    equ    "Zo"
  1076. Dia_SlMark    equ    "Sl"
  1077. Dia_LiMark    equ    "Li"
  1078. Dia_TxMark    equ    "Tx"
  1079. Dia_TaMark    equ    "Ta"
  1080. Dia_TdMark    equ    "Td"
  1081. ; Numero des messages d'erreur
  1082. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1083. EDia_Syntax    equ    1
  1084. EDia_OMem    equ    2
  1085. EDia_LabAD    equ    3
  1086. EDia_LabND    equ    4
  1087. EDia_ChanAD    equ    5
  1088. EDia_ChanND    equ    6
  1089. EDia_Screen    equ    7
  1090. EDia_VarND    equ    8
  1091. EDia_FCall    equ    9
  1092. EDia_Type    equ    10
  1093. EDia_OBuffer    equ    11
  1094. EDia_NPar    equ    12
  1095.  
  1096. ***************************************************************
  1097. *        Interpretor datas zone
  1098. *        Pointed to by A5
  1099. ***************************************************************
  1100.  
  1101.         RsReset
  1102.  
  1103. ;        VBL Routines
  1104. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~ 
  1105. VblRout:    rs.l     8
  1106.  
  1107. ;        Extensions
  1108. ; ~~~~~~~~~~~~~~~~~~~~~~~~
  1109. AdTokens:    rs.l     27        
  1110. AdTTokens:    rs.l     27
  1111. ExtAdr:        rs.l     26*4
  1112. ExtTests:    rs.l     8
  1113.  
  1114. ;         Adresses Kickstart
  1115. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1116. DosBase:    rs.l     1
  1117. DFloatBase    rs.l    1
  1118. DMathBase    rs.l    1
  1119. FloatBase:    rs.l    1
  1120. MathBase:    rs.l     1
  1121. IconBase:    rs.l     1
  1122.  
  1123. ;         Données systeme
  1124. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1125. Sys_AData    rs.l    1
  1126. Sys_LData    rs.l    1
  1127. Sys_Message    rs.l    1
  1128. Sys_WAd        rs.l    1
  1129. Sys_WSegment    rs.l    1
  1130. Sys_Messages    rs.l    1
  1131. Sys_Banks    rs.l    1
  1132. Sys_Stopped    rs.l    1
  1133. Sys_MyTask    rs.l    1
  1134. Sys_OldName    rs.l    1
  1135. Sys_Editor    rs.l    1
  1136. Sys_Monitor    rs.l    1
  1137. Sys_Resource    rs.l    1
  1138. Sys_WStarted    rs.b    1
  1139.         rs.b    1
  1140. Sys_Pathname    rs.b    80
  1141.  
  1142. Mon_Base    rs.l    1
  1143. Prg_List    rs.l    1
  1144. Prg_Runned    rs.l    1
  1145.  
  1146. ;        Graphics
  1147. ; ~~~~~~~~~~~~~~~~~~~~~~
  1148. AAreaSize:    equ     16
  1149. AAreaInfo:    rs.b     24
  1150. AAreaBuf:    rs.b     AAreaSize*5+10
  1151.         rs.b     16
  1152. ATmpRas:    rs.l     2
  1153. AppNPlan    rs.w     1
  1154. SccEcO:        rs.l     1
  1155. SccEcD:        rs.l     1
  1156.  
  1157. ;        File selector
  1158. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1159. FsAdEc:        rs.l 1
  1160. FsOldEc        rs.w 1
  1161. FsFlag:        rs.w 1
  1162. FsActive:    rs.w 1
  1163. FsPosF:        rs.w 1
  1164. FsIFlag:    rs.w 1
  1165. FsLPath:    rs.w 1
  1166. FsLPath1:    rs.w 1
  1167. FsCPath:    rs.w 1
  1168. FsLNom:        rs.w 1
  1169. FsCNom:        rs.w 1
  1170. FsWiAct:    rs.w 1
  1171. FsSp:        rs.l 1
  1172. WB2.0:        rs.w 1
  1173. Fs_Base        rs.l    1
  1174. Fs_Saved    rs.l    1
  1175. Fs_SaveList    rs.l    1
  1176.         rs.b    1
  1177. FillFSorted    rs.b    1
  1178.  
  1179. ;        Editor
  1180. ; ~~~~~~~~~~~~~~~~~~~~
  1181. BasSp:        rs.l     1    
  1182.         rs.w     1        
  1183. ColBack:    rs.w     1
  1184. DefFlag:    rs.w     1    
  1185.  
  1186. ;        Float
  1187. ; ~~~~~~~~~~~~~~~~~~~
  1188. BuFloat:    rs.b     64
  1189. DeFloat:    rs.b     32
  1190. TempFl:        rs.l     1
  1191. TempBuf:    rs.l     1
  1192. ValPi:        rs.l     1
  1193. Val180:        rs.l     1
  1194.  
  1195. ;        Disque I/O
  1196. ; ~~~~~~~~~~~~~~~~~~~~~~~~
  1197. IffParam:    rs.l     1
  1198. IffFlag:    rs.l     1
  1199. IffReturn    rs.l     1
  1200. BufFillF:    rs.l     1
  1201. FillFLong:    rs.w     1
  1202. FillFSize:    rs.w     1
  1203. FillFNb:    rs.w     1
  1204. FillF32:    rs.w     1
  1205. DirLong:    rs.l     1
  1206. DirComp:    rs.w     1
  1207. DirLNom:    rs.w     1    
  1208. PathAct:    rs.l     1
  1209. DirFNeg:    rs.l     1    
  1210. BufBMHD:    rs.l     1
  1211. BufCMAP:    rs.l     1
  1212. BufCAMG:    rs.l     1
  1213. BufCCRT:    rs.l     1
  1214. BufAMSC:    rs.l     1
  1215.  
  1216. ;         Tokenisation / Stockage
  1217. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1218. TkAd:        rs.l     1    
  1219. TkChCar:    rs.w     1    
  1220. VerPos:        rs.l     1    
  1221. VerBase:    rs.l     1    
  1222. VerNInst    rs.l    1
  1223. VerNot1.3    rs.b    1
  1224. VerCheck1.3    rs.b    1
  1225. Parenth:    rs.w     1    
  1226. WBench        rs.b    1
  1227. WB_Closed    rs.b    1
  1228.  
  1229. TBuffer:    equ     1024    
  1230. TMenage:    equ     160*10-64
  1231. Buffer:        rs.l     1    
  1232. BMenage:    rs.l     1
  1233.  
  1234. LimSave:    rs.w     4
  1235. FsLimSave:    rs.w     4
  1236. Name1:        rs.l     1    
  1237. Name2:        rs.l     1
  1238.  
  1239. Access:        rs.l     1        
  1240. AcLdTemp:    rs.l     1
  1241. AccFlag:    rs.w     1
  1242.  
  1243. RasAd:        rs.l     1        
  1244. RasLong:    rs.l     1
  1245. RasSize:    rs.w     1
  1246. RasLock:    rs.l     1
  1247. ScOn:        rs.w     1
  1248. ScOnAd:        rs.l     1
  1249. BufBob:        rs.l     1
  1250. BufLabel:    rs.l     1
  1251. LMouse:        rs.l     1
  1252. VBLOCount:    rs.w     1
  1253. VBLDelai:    rs.w     1
  1254. SScan:        rs.w     1
  1255. Seed:        rs.l     1
  1256. OldRnd:        rs.l     1
  1257. PAmalE:        rs.w     1
  1258. ReqSave:    rs.l     1
  1259. ReqSSave:    rs.l     1
  1260. SNoFlip:    rs.w     1
  1261. LockSave:    rs.l     1
  1262. Handle:        rs.l     1
  1263. PrtHandle:    rs.l     1
  1264. PosFillF:    rs.w     1
  1265. TempBuffer    rs.l     1
  1266.  
  1267. ;        Canaux d'animation
  1268. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1269. AnCanaux:    rs.w 64
  1270. InterOff:    rs.w 1
  1271.  
  1272. ; ____________________________________________________________________________
  1273. ;
  1274. ;                            VARIABLES RUN-TIME
  1275. ; ____________________________________________________________________________
  1276. ;
  1277. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1278. ;                    Debut de la zone poussee par PRUN
  1279. ;
  1280. DebSave:    equ __RS
  1281.  
  1282. ;        Adresse de la liste de Banques/Dialogues
  1283. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1284. Cur_Banks    rs.l     1
  1285. Cur_Dialogs    rs.l    1
  1286. Cur_ChrJump    rs.l    1
  1287.  
  1288. ;         Donnnes du programme
  1289. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1290. Stack_ProcSize    equ    42
  1291. Stack_Size    rs.w     1
  1292. Stack_CSize    rs.w     1
  1293. Prg_Source    rs.l     1
  1294. Prg_FullSource    rs.l    1
  1295. Prg_Includes    rs.l    1
  1296. Prg_Run        rs.l    1
  1297. Prg_Test    rs.l    1
  1298. Prg_JError    rs.l    1
  1299. Prg_ChrGet    rs.l    1
  1300.  
  1301. ;         Verification / Buffers
  1302. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1303. Passe:        rs.w 1
  1304. VarBuf:        rs.l 1        
  1305. VarBufL:    rs.l 1        
  1306. VarBufFlg:    rs.w 1        
  1307. LabHaut:    rs.l 1        
  1308. LabBas:        rs.l 1
  1309. LabMini:    rs.l 1
  1310. DVNmBas:    rs.l 1        
  1311. DVNmHaut:    rs.l 1
  1312. VNmLong:    rs.l 1
  1313. VNmHaut:    rs.l 1
  1314. VNmBas:        rs.l 1
  1315. VNmMini:    rs.l 1
  1316. VDLigne:    rs.l 1
  1317. BaTablA:    rs.l 1        
  1318. HoTablA:    rs.l 1
  1319. VarLong:    rs.w 1
  1320. GloLong:    rs.w 1
  1321. VarGlo:        rs.l 1
  1322. VarLoc:        rs.l 1
  1323. TabBas:        rs.l 1
  1324. ChVide:        rs.l 1
  1325. LoChaine:    rs.l 1        
  1326. HiChaine:    rs.l 1        
  1327. HoLoop:        rs.l 1
  1328. BaLoop:        rs.l 1
  1329.  
  1330. ;        Donnees RUN
  1331. ; ~~~~~~~~~~~~~~~~~~~~~~~~~
  1332. PLoop:        rs.l 1
  1333. MinLoop:    rs.l 1
  1334. BasA3:        rs.l 1
  1335. ErrRet:        rs.l 1        
  1336. ErrRAd:        rs.l 1
  1337. Phase:        rs.w 1
  1338. DTablA:        rs.l 1
  1339. CurTablA:    rs.l 1
  1340. PDebug:        rs.l 1
  1341.         rs.b 1
  1342.         rs.b 1
  1343. ActuMask:    rs.w 1        
  1344. IffMask:    rs.l 1
  1345. ExpFlg:        rs.w 1
  1346. FixFlg:        rs.w 1
  1347.  
  1348. ;         DEVICES / LIBRARIES
  1349. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1350. Dev_Max        equ    7
  1351. Dev_List    rs.b    12*Dev_Max
  1352. Lib_Max        equ    7
  1353. Lib_List    rs.l    4*Lib_Max
  1354.  
  1355. ;         MENUS
  1356. ; ~~~~~~~~~~~~~~~~~~~
  1357. MnNDim:        equ 8
  1358. Mn_SSave    equ    __RS        Debut du flip de l'editeur
  1359. MnBase:        rs.l     1        ~~~~~~~~~~~~~~~~~~~~~~~~~~
  1360. MnBaseX:    rs.w     1
  1361. MnBaseY:    rs.w     1
  1362. MnChange:    rs.w     1
  1363. MnMouse:    rs.w     1
  1364. MnError:    rs.w     1
  1365. MnAdEc:        rs.l     1
  1366. MnScOn:        rs.w     1
  1367. MgFlags:    rs.w     1
  1368. MnNZone:    rs.w     1
  1369. MnZoAct:    rs.w    1
  1370. MnAct:        rs.l    1
  1371. MnTDraw:    rs.l    1
  1372. MnTable:    rs.l     MnNDim+1
  1373. MnChoix:    rs.w     MnNDim
  1374. MnDFlags:    rs.b     MnNDim
  1375. MnDAd:        rs.l     1
  1376. MnProc:        rs.w     1
  1377. Mn_ESave    equ    __RS        Fin du flip editeur
  1378. MnRA3:        rs.l     1        ~~~~~~~~~~~~~~~~~~~
  1379. MnRA4:        rs.l     1
  1380. MnPile:        rs.l     1
  1381. OMnBase:    rs.l     1
  1382. OMnNb:        rs.w     1
  1383. OMnType:    rs.w    1
  1384.  
  1385. ;        Def Scroll
  1386. ; ~~~~~~~~~~~~~~~~~~~~~~~~
  1387. DScrolls:    rs.w 6*16
  1388.  
  1389. ;         Dialogues
  1390. ; ~~~~~~~~~~~~~~~~~~~~~~~
  1391. IDia_BankPuzzle    rs.l    1
  1392. IDia_Error    rs.l    1
  1393.  
  1394. ;        Patch monitor
  1395. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1396. Patch_ScCopy    rs.l    1
  1397. Patch_ScFront    rs.l    1
  1398. Patch_Errors    rs.l    1
  1399. Patch_Menage    rs.l    1
  1400. Mon_Here    rs.b    1
  1401.         rs.b    1
  1402.  
  1403. ;         Fichiers
  1404. ; ~~~~~~~~~~~~~~~~~~~~~~
  1405. FhA:        equ 0
  1406. FhT:        equ 4
  1407. FhF:        equ 6
  1408. TFiche:        equ 10
  1409. NFiche:        equ 10
  1410. ChrInp:        rs.w 1
  1411. Fichiers:    rs.b TFiche*NFiche
  1412.  
  1413. ;         AREXX
  1414. ; ~~~~~~~~~~~~~~~~~~~
  1415. Arx_Port    rs.l    1
  1416. Arx_Base    rs.l    1
  1417. Arx_Answer    rs.l    1
  1418. Arx_PortName    rs.b    32
  1419.  
  1420. ;        Every
  1421. ; ~~~~~~~~~~~~~~~~~~~
  1422. EveType:    rs.w     1
  1423. EveLabel:    rs.l     1
  1424. EveCharge:    rs.w     1
  1425.  
  1426. ;        Miscellenous
  1427. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~
  1428. BuffSize:    rs.l     1
  1429. AdrIcon:    rs.l     1
  1430. DefPal:        rs.w     32
  1431. DBugge        rs.l     1
  1432. CallAd:        rs.l     1
  1433.  
  1434. ;         Données télécommande
  1435. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1436. Prg_Accessory    rs.b    1 
  1437. Ed_Zappeuse    rs.b    1
  1438.  
  1439. ;        Variables mises à zero par un RUN 
  1440. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1441. DebRaz:        equ     __RS
  1442. PrintFlg:    rs.w     1
  1443. PrintPos:    rs.l     1
  1444. PrinType:    rs.w     1
  1445. PrintFile:    rs.l     1
  1446. UsingFlg:    rs.w     1
  1447. ImpFlg:        rs.w     1
  1448. ParamE:        rs.l     1
  1449. ParamF:        rs.l     1
  1450. ParamC:        rs.l     1
  1451. InputFlg:    rs.w     1
  1452. ContFlg:    rs.w     1
  1453. ContChr:    rs.l     1
  1454. ErrorOn:    rs.w     1
  1455. ErrorChr:    rs.l     1
  1456. OnErrLine:    rs.l     1
  1457. TrapAdr        rs.l    1
  1458. TrapErr        rs.w    1
  1459. TVMax:        rs.w     1
  1460. DProc:        rs.l     1
  1461. AData:        rs.l     1
  1462. PData:        rs.l     1
  1463. MenA4:        rs.l     1
  1464. LockOld:    rs.l     1
  1465. MnChoice:    rs.w     1
  1466. Angle:        rs.w     1
  1467. DMathFlag:    rs.b    1
  1468. Ed_YaUTest    rs.b    1
  1469. CallReg:    rs.l     8+7
  1470. FinRaz:        equ     __RS
  1471. FinSave:    equ     __RS
  1472. ;        Fin de la zone pousse par PRUN
  1473. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1474.  
  1475. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1476. ;                 Données de Configuration Interpréteur
  1477. ;
  1478. PI_Start    equ    __RS
  1479. ; Initialisation de la trappe
  1480. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1481. PI_ParaTrap    rs.l    1        0 - Adresse actualisation
  1482. PI_AdMouse    rs.l    1        4 - Adresse souris
  1483.         rs.w    1        8 - Nombre de bobs
  1484.         rs.w    1        10- Position par defaut ecran!!
  1485.         rs.l    1        12- Taille liste copper
  1486.         rs.l    1        16- Nombre lignes sprites
  1487. ; Taille des buffers 
  1488. ; ~~~~~~~~~~~~~~~~~~
  1489. PI_VNmMax    rs.l    1        20- Buffer des noms de variable
  1490. PI_TVDirect    rs.w    1        24- Variables mode direct
  1491. PI_DefSize    rs.l    1        26- Taille buffer par defaut
  1492. ; Directory
  1493. ; ~~~~~~~~~
  1494. PI_DirSize    rs.w    1        30- Taille nom directory
  1495. PI_DirMax    rs.w    1        32- Nombre max de noms
  1496. ; Faire carriage return lors de PRINT?
  1497. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1498. PI_PrtRet    rs.b    1        34- Return lors de 10
  1499. ; Faire des icones?
  1500. ; ~~~~~~~~~~~~~~~~~
  1501. PI_Icons    rs.b    1        35- Faire de icones
  1502. ; Autoclose workbench?
  1503. ; ~~~~~~~~~~~~~~~~~~~~
  1504. PI_AutoWB    rs.b    1        36- Fermer automatiquement
  1505. PI_AllowWB    rs.b    1        37- Close Workbench effective?
  1506. ; Close editor?
  1507. ; ~~~~~~~~~~~~~~~~~~~~
  1508. PI_CloseEd    rs.b    1        38- Autoriser fermeture
  1509. PI_KillEd    rs.b    1        39- Autoriser fermeture
  1510. PI_FsSort    rs.b    1        40- Sort files
  1511. PI_FsSize    rs.b    1        41- Size of files
  1512. PI_FsStore    rs.b    1        42- Store directories
  1513. ; Securite flags
  1514. ; ~~~~~~~~~~~~~~
  1515.         rs.b    1        43- Flag libre
  1516.         rs.b    4        44- 4 flags libres!
  1517. ; Text reader
  1518. ; ~~~~~~~~~~~
  1519. PI_RtSx        rs.w    1        48- Taille X ecran Readtext
  1520. PI_RtSy        rs.w    1        50- Taille Y ecran Readtext
  1521. PI_RtWx        rs.w    1        52- Position X
  1522. PI_RtWy        rs.w    1        54- Position Y
  1523. PI_RtSpeed    rs.w    1        56- Vitesse apparition
  1524. ; File selector
  1525. ; ~~~~~~~~~~~~
  1526. PI_FsDSx    rs.w    1        58- Taille X fsel
  1527. PI_FsDSy    rs.w    1        60- Taille Y fsel
  1528. PI_FsDWx    rs.w    1        62- Position X
  1529. PI_FsDWy    rs.w    1        64- Position Y
  1530. PI_FsDVApp    rs.w    1        66- Vitesse app
  1531. ; Ecran par defaut
  1532. ; ~~~~~~~~~~~~~~~~
  1533. PI_DefETx    rs.w    1
  1534. PI_DefETy    rs.w    1
  1535. PI_DefECo    rs.w    1
  1536. PI_DefECoN    rs.w    1
  1537. PI_DefEMo    rs.w    1
  1538. PI_DefEBa    rs.w    1
  1539. PI_DefEPa    rs.w    32
  1540.         rs.l    8        Pour extension!
  1541. ;
  1542. ;        Fin de la zone configuration interpreteur
  1543. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1544.  
  1545.  
  1546. ; __________________________
  1547. ;
  1548. ;         Mode Escape
  1549. ; __________________________
  1550. ;
  1551. Esc_TFonc    rs.l     1
  1552. Esc_Buf        rs.l     1        
  1553. Esc_KMem    rs.l    1
  1554. Esc_KMemPos    rs.l    1
  1555. Direct        rs.w     1
  1556. DirFlag        rs.w     1
  1557. EsFlag        rs.w     1
  1558. Es_LEd        rs.b    LEd_Size
  1559. ; _______________________
  1560. ;
  1561. ;         Editeur
  1562. ; _______________________
  1563. ;
  1564.  
  1565. ; Pointeurs sur zones de chaines
  1566. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1567. Ed_ConfigHead    equ    "ApCf"
  1568. Ed_QuitHead    equ    "ApLC"
  1569.  
  1570. ; Adresse des elements de configuration
  1571. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1572. Ed_Config    rs.l    1
  1573. Ed_Systeme    rs.l    1        Ne pas changer l'ordre
  1574. EdM_Messages    rs.l    1
  1575. Ed_Messages    rs.l    1
  1576. Ed_TstMessages    rs.l    1
  1577. Ed_RunMessages    rs.l    1
  1578. Ed_MnPrograms    rs.l    1
  1579. EdM_User    rs.l    1
  1580. EdM_Definition    rs.l    1
  1581.  
  1582.  
  1583. ; Données normales
  1584. ; ~~~~~~~~~~~~~~~~
  1585. Ed_Banks    rs.l    1
  1586. Ed_Dialogs    rs.l    1
  1587.  
  1588. Edt_List    rs.l    1
  1589. Edt_Current    rs.l    1
  1590. Edt_Runned    rs.l    1
  1591.  
  1592. Ed_Prg2ReLoad    rs.l    1
  1593. Ed_BankGrab    rs.w     1
  1594. Ed_BankFlag    rs.w     1
  1595. Ed_ZapCounter    rs.w    1
  1596. Ed_ZapError    rs.w    1
  1597. Ed_ZapMessage    rs.l    1
  1598. Ed_ZapParam    rs.l    1
  1599. Ed_ADialogues    rs.l    1
  1600. Ed_VDialogues    rs.l    1
  1601. Ed_DiaCopyD    rs.l    1
  1602. Ed_DiaCopyC    rs.l    1
  1603.  
  1604. EdMa_Changed    rs.b    1
  1605. Ed_FUndo    rs.b    1
  1606. Ed_SCallFlags    rs.b    1
  1607. EdC_Changed    rs.b    1
  1608.  
  1609. EdMa_Head    equ    "ApMa"
  1610. EdMa_List    rs.l    1
  1611. EdMa_Play    rs.l    1
  1612. EdMa_Tape    rs.w    1
  1613. EdMa_Change    rs.b    1
  1614. Ed_CuFlag    rs.b    1
  1615.  
  1616. Ed_AutoSaveRef    rs.l    1
  1617. Ed_Avert    rs.w    1
  1618.  
  1619. Ed_Ty        rs.w    1
  1620. Ed_Block    rs.l    1
  1621. Ed_BufE:    rs.l     1    
  1622. Ed_BufT:    rs.l     1        
  1623. Ed_WindowToDel    rs.l    1
  1624. Ed_EtCps    rs.b     1
  1625. Ed_EtatAff    rs.b    1
  1626. Ed_EtXX        rs.b    8    
  1627. Ed_EtOCps    rs.b     1
  1628. EdC_Modified    rs.b    1
  1629. Ed_MemoryX    rs.w    1
  1630. Ed_MemorySx    rs.w    1
  1631.  
  1632. Ed_Resource    rs.l    1
  1633.  
  1634. Ed_ExtTitles    rs.l    26
  1635.  
  1636. Ed_MKey        rs.b    1
  1637. Ed_MkFl        rs.b    1
  1638. Ed_MkIns    rs.b    1
  1639. Ed_OMKey    rs.b    1
  1640. Ed_BigView    rs.b    1
  1641. Ed_LinkTokCur    rs.b    1
  1642.  
  1643. Ed_MkCpt    rs.w    1
  1644. Ed_WMax        rs.w    1
  1645. Ed_SchLong    rs.b    1
  1646. Ed_RepLong    rs.b     1
  1647. Ed_Opened    rs.b    1
  1648. Ed_TstMesOn    rs.b    1
  1649.  
  1650. Ed_NoAff    rs.b    1    
  1651. Ed_Warm        rs.b    1
  1652. Ed_Disk        rs.w    1
  1653. Ed_FSel        rs.w    1
  1654.  
  1655. Ed_SchBuf    rs.b     34
  1656. Ed_RepBuf    rs.b     34
  1657.  
  1658. EdM_Table    rs.l    1
  1659. EdM_TableSize    rs.l    1
  1660. EdM_TableAMOS    rs.l    1
  1661. EdM_MenuAMOS    rs.l    1
  1662. EdM_MessAMOS    rs.l    1
  1663. EdM_PosHidden    rs.w    1
  1664. EdM_Flag    rs.b    1
  1665.         rs.b    1
  1666.  
  1667. EdM_Copie    rs.b    Mn_ESave-Mn_SSave
  1668. Ed_Boutons    rs.b    Bt_Long*14
  1669.  
  1670. SlDelai        equ     10        
  1671.  
  1672. * ILLEGAL à enlever
  1673. EdMarks:    equ     __RS
  1674.  
  1675. ; Zone de sauvegarde de la config Editeur
  1676. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1677. Ed_DConfig    equ    __RS
  1678. ; Screen definition
  1679. Ed_Sx        rs.w    1        
  1680. Ed_Sy        rs.w    1
  1681. Ed_Wx        rs.w    1
  1682. Ed_Wy        rs.w    1
  1683. Ed_VScrol    rs.w    1
  1684. Ed_Inter    rs.b    1
  1685.         rs.b    1
  1686. ; Colour back
  1687. Ed_ColB        rs.w    1
  1688. ; Length UNDO
  1689. Ed_LUndo    rs.l    1    
  1690. Ed_NUndo    rs.l    1
  1691. ; Untok case
  1692. DtkMaj1        rs.b    1    
  1693. DtkMaj2        rs.b    1
  1694. ; Flags
  1695. Ed_SvBak    rs.b    1
  1696. EdM_Keys    rs.b    1
  1697. Esc_KMemMax    rs.w    1
  1698. ; Colour palette
  1699. Ed_Palette    rs.w    8
  1700. ; Escape mode positions
  1701. Es_Y1        rs.w    1
  1702. Es_Y2        rs.w    1
  1703. ; Security!
  1704.         rs.l    7
  1705. ; Flags change within the editor
  1706. Ed_AutoSave    rs.l    1    
  1707. Ed_AutoSaveMn    rs.l    1    
  1708. Ed_SchMode    rs.w     1    
  1709. Ed_Tabs        rs.w    1
  1710. Esc_Output    rs.b    1
  1711. Ed_QuitFlags    rs.b    1
  1712. Ed_Insert    rs.b    1
  1713. Ed_Sounds    rs.b    1
  1714.  
  1715. ; Programmes autoload
  1716. ; ~~~~~~~~~~~~~~~~~~~
  1717. Ed_AutoLoad    rs.b    3*184
  1718. ; Touches par defaut
  1719. ; ~~~~~~~~~~~~~~~~~~
  1720. Ed_KFonc    rs.b    3*184
  1721.         rs.b    2
  1722. Ed_FConfig    equ    __RS
  1723.  
  1724. ; Find de la config editeur        
  1725. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1726.  
  1727. ********************************* Total data length
  1728. DataLong:    equ __RS
  1729.  
  1730. ;    Flags banques
  1731. ; ~~~~~~~~~~~~~~~~~~~
  1732. Bnk_BitData    equ    0        Banque de data
  1733. Bnk_BitChip    equ    1        Banque en chip
  1734. Bnk_BitBob    equ    2        Banque de Bobs
  1735. Bnk_BitIcon    equ    3        Banque d'icons
  1736.  
  1737. ; _____________________________________________________________________________
  1738. ;
  1739. ;                     Définition d'un programme
  1740. ; _____________________________________________________________________________
  1741. ;
  1742.  
  1743.         RsReset
  1744.  
  1745. Prg_Next    rs.l    1        Prochain dans la liste
  1746.  
  1747. Prg_NLigne:    rs.w     1        Nombre de lignes
  1748.  
  1749. Prg_StMini    rs.l    1        Buffer de stockage
  1750. Prg_StTTexte    rs.l     1    
  1751. Prg_StHaut    rs.l     1    
  1752. Prg_StBas    rs.l     1
  1753. Prg_Banks    rs.l    1
  1754. Prg_Dialogs    rs.l    1
  1755. Prg_StModif    rs.b     1        Listing modifie
  1756. Prg_Change    rs.b    1        Sauver le programme
  1757. Prg_Edited    rs.b    1        Une fenetre?
  1758. Prg_NoNamed    rs.b    1        Numero de la structure
  1759. Prg_Not1.3    rs.b    1        Compatible 1.3?
  1760.         rs.b    1
  1761.  
  1762. Prg_Previous    rs.l    1        Programme precedent
  1763. Prg_RunData    rs.l    1        Donnée si PRUN
  1764. Prg_ZapData    rs.l    1
  1765. Prg_AdEProc    rs.l     1        Procedure d'erreur
  1766. Prg_XEProc    rs.w     1
  1767.  
  1768. Prg_Undo    rs.l    1        Buffer undo
  1769. Prg_PUndo    rs.l    1        Position dans buffer
  1770. Prg_Marks    rs.l     10        
  1771.  
  1772. Prg_NamePrg    rs.b    128        Nom du programme
  1773. Prg_Long    equ    __RS
  1774.         
  1775.  
  1776. ; _____________________________________________________________________________
  1777. ;
  1778. ;                     Définition d'une edition
  1779. ; _____________________________________________________________________________
  1780. ;
  1781.  
  1782.         RsReset
  1783. Edt_Next    rs.l    1        Edition suivante
  1784. Edt_Prg        rs.l    1        Adresse structure programme
  1785. Edt_BufE    rs.l    1        Adresse buffer edition
  1786.  
  1787. ; Données affichage
  1788. Edt_Order    rs.w    1        Numero d'ordre dans l'affichage
  1789. Edt_Window    rs.w    1        Numero des diverse zones / fenetres
  1790. Edt_WindEtat    rs.w    1
  1791. Edt_Zones    rs.w    1
  1792. Edt_ZEtat    rs.w    1
  1793. Edt_ZBas    rs.w    1
  1794.  
  1795. Edt_X        rs.w    1        Coordonnees de la fenetre
  1796. Edt_Y        rs.w    1
  1797. Edt_Sy        rs.w    1
  1798. Edt_WindX    rs.w    1
  1799. Edt_WindY    rs.w    1
  1800. Edt_WindSx    rs.w    1
  1801. Edt_WindSy    rs.w    1
  1802. Edt_WindTx    rs.w    1
  1803. Edt_WindTy    rs.w    1
  1804. Edt_WindOldTy    rs.w    1
  1805. Edt_WindEX    rs.w    1
  1806. Edt_WindEY    rs.w    1
  1807. Edt_WindESx    rs.w    1
  1808. Edt_BasY    rs.w    1
  1809. Edt_EtMess    rs.w     1        
  1810. Edt_EtAlert    rs.l     1        
  1811.  
  1812. Edt_SInit    equ    __RS        Zone à remettre à zero
  1813. Edt_SReload    equ    __RS
  1814. Edt_SSplit    equ    __RS
  1815. Edt_XPos    rs.w     1        Positions texte dans fenetre
  1816. Edt_YPos    rs.w     1
  1817. Edt_XCu        rs.w     1        Positions curseur
  1818. Edt_YCu        rs.w     1
  1819. Edt_DebProc    rs.l     1
  1820. Edt_CurLigne    rs.l     1        Recherche
  1821. Edt_LEdited    rs.w    1        Flag ligne editee
  1822. Edt_EInit    equ    __RS
  1823. Edt_EReload    equ    __RS
  1824. Edt_ESplit    equ    __RS
  1825.  
  1826. Edt_XBloc    rs.w    1        Position bloc
  1827. Edt_YBloc    rs.w    1
  1828. Edt_YOldBloc    rs.w    1
  1829.  
  1830. Edt_LinkPrev    rs.l    1        Links de fenetre
  1831. Edt_LinkNext    rs.l    1
  1832. Edt_LinkScroll    rs.l    1
  1833. Edt_LinkYOld    rs.w    1
  1834.  
  1835. Edt_Hidden    rs.b    1        Fenetre cachee
  1836. Edt_LinkFlag    rs.b    1        Fenetre linkee
  1837. Edt_First    rs.b    1        Premiere fenetre affichee?
  1838. Edt_Last    rs.b    1        Derniere fenetre affichee?
  1839. Edt_EtatAff    rs.b    1        Flags ligne d'etat
  1840. Edt_PrgDelete    rs.b    1        Programme à effacer en retour
  1841. Edt_ASlY    rs.b    1        Compteur affichage slider
  1842.         rs.b    1
  1843.  
  1844. Edt_SlV        rs.b    Sl_Long        Structure slider
  1845. Edt_Bt1        rs.b    Bt_Long        Structures bouton
  1846. Edt_Bt2        rs.b    Bt_Long
  1847. Edt_Bt3        rs.b    Bt_Long
  1848.         rs.w    1
  1849. Edt_Long    equ    __RS        Longueur de la structure
  1850.  
  1851. ;                        Flags de la ligne d'etat
  1852. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1853. EtA_Caps    equ    0
  1854. EtA_Ins        equ    1
  1855. EtA_X        equ    2
  1856. EtA_Y        equ    3
  1857. EtA_Nom        equ    4
  1858. EtA_Free    equ    5
  1859. EtA_Clw        equ    6
  1860. EtA_Alert    equ    7
  1861. EtA_BXY        equ    %00001100
  1862. EtA_BAll    equ    %01111111
  1863.  
  1864. ;            AREXX
  1865. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1866. RC_OK            equ    0
  1867. RC_WARN            equ    5
  1868. RC_ERROR        equ    10
  1869. RC_FATAL        equ    20
  1870. RXCODEMASK        equ     $FF000000
  1871. RXCOMM            equ    $01000000
  1872. RXFUNC            equ    $02000000
  1873. RXFF_RESULT        equ    $00020000
  1874. ra_Length        equ    4
  1875. ra_Buff            equ    8
  1876. rm_Result1        equ    $20
  1877. rm_Result2        equ    $24
  1878. rm_Sdtin        equ    $74
  1879. rm_Sdout        equ    $78
  1880. rm_Args            equ    $28
  1881. rm_Action        equ    $1c
  1882.  
  1883.